home *** CD-ROM | disk | FTP | other *** search
/ InterCD 2002 January / january_2002.iso / Piposh Special / Piposh / COMEIN.DXR / 00155.ls < prev    next >
Encoding:
Text File  |  2004-12-06  |  2.2 KB  |  99 lines
  1. on hatkeys
  2.   global effectspath
  3.   if the keyCode = 123 then
  4.     sound playFile 2, effectspath & "jmp1.aif"
  5.     if sprite(5).visible = 1 then
  6.       go("w1")
  7.       sprite(5).visible = 0
  8.       sprite(6).visible = 1
  9.     else
  10.       if sprite(8).visible = 1 then
  11.         go("w1")
  12.         sprite(8).visible = 0
  13.         sprite(9).visible = 1
  14.       end if
  15.     end if
  16.   else
  17.     if the keyCode = 124 then
  18.       sound playFile 2, effectspath & "jmp2.aif"
  19.       if sprite(11).visible = 1 then
  20.         go("w1")
  21.         sprite(11).visible = 0
  22.         sprite(10).visible = 1
  23.       else
  24.         if sprite(8).visible = 1 then
  25.           go("w1")
  26.           sprite(8).visible = 0
  27.           sprite(7).visible = 1
  28.         end if
  29.       end if
  30.     end if
  31.   end if
  32. end
  33.  
  34. on pozkeys
  35.   global effectspath
  36.   if the keyCode = 123 then
  37.     sound playFile 2, effectspath & "jmp1.aif"
  38.     if sprite(5).visible = 1 then
  39.       go("w3")
  40.       sprite(5).visible = 0
  41.       sprite(6).visible = 1
  42.     else
  43.       if sprite(8).visible = 1 then
  44.         go("w3")
  45.         sprite(8).visible = 0
  46.         sprite(9).visible = 1
  47.       end if
  48.     end if
  49.   else
  50.     if the keyCode = 124 then
  51.       sound playFile 2, effectspath & "jmp2.aif"
  52.       if sprite(11).visible = 1 then
  53.         go("w3")
  54.         sprite(11).visible = 0
  55.         sprite(10).visible = 1
  56.       else
  57.         if sprite(8).visible = 1 then
  58.           go("w3")
  59.           sprite(8).visible = 0
  60.           sprite(7).visible = 1
  61.         end if
  62.       end if
  63.     end if
  64.   end if
  65. end
  66.  
  67. on dockeys
  68.   global effectspath
  69.   if the keyCode = 125 then
  70.     sound playFile 2, effectspath & "jmp1.aif"
  71.     if sprite(5).visible = 1 then
  72.       go("y1")
  73.       sprite(5).visible = 0
  74.       sprite(6).visible = 1
  75.     else
  76.       if sprite(8).visible = 1 then
  77.         go("y1")
  78.         sprite(8).visible = 0
  79.         sprite(9).visible = 1
  80.       end if
  81.     end if
  82.   else
  83.     if the keyCode = 126 then
  84.       sound playFile 2, effectspath & "jmp2.aif"
  85.       if sprite(11).visible = 1 then
  86.         go("y1")
  87.         sprite(11).visible = 0
  88.         sprite(10).visible = 1
  89.       else
  90.         if sprite(8).visible = 1 then
  91.           go("y1")
  92.           sprite(8).visible = 0
  93.           sprite(7).visible = 1
  94.         end if
  95.       end if
  96.     end if
  97.   end if
  98. end
  99.